(import myturtle.Turtle)

(defn init-turtle
  []
  (def t (new Turtle)))

;; Turtle "t" must be initialized before calling this fn
;; and then the static "draw" method must be invoked to draw
(defn turtle-interpret
 "Interpret (draw) a set of Turtle commands."
 [cmds]
 (map eval cmds))

(defn draw-turtle
  [dim]
  (. Turtle (draw t dim dim)))

;; (. Turtle (draw t 500 500)))

;;   (. Turtle (draw t 500 500)))) ;; draw the window